home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Libris Britannia 4
/
science library(b).zip
/
science library(b)
/
PROGRAMM
/
PASCAL
/
0195.ZIP
/
KAVAIL.PAS
< prev
next >
Wrap
Pascal/Delphi Source File
|
1984-12-02
|
331b
|
8 lines
{@@@@@@@@@@@ copyright (C) 1984 by Neil J. Rubenking @@@@@@@@@@@@@@@@@@@@@@@@
The purchaser of these procedures and functions may include them in COMPILED
programs freely, but may not sell or give away the source text.}
{$I kavail.lib}
begin
WriteLn('You have ',K_available,'K of memory available at this moment.');
end.